home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / CRS / crs04.d81 / dcmr.sfx / documentation.p (.txt) < prev    next >
Commodore BASIC  |  1990-02-12  |  22KB  |  601 lines
  1. 490 POKE53280,14:POKE53281,15:PRINT"[147][151]";:GOTO1000
  2. 499 IFLC=>PLTHENRETURN
  3. 500 IFPL-LC<MNTHENGOSUB600
  4. 510 PRINT#4,"       ";A$:IFLF$="Y"THENPRINT#4,CHR$(10);
  5. 520 LC=LC+1:A$="":GETA$:IFA$="Q"THENPRINT#4:CLOSE4:PRINT"...ABORTED":END
  6. 530 A$=" ":MN=1:RETURN
  7. 550 IFMN=1THENMN=4
  8. 555 IFPL-LC=>MNTHENA$=T$:GOSUB510:GOSUB510:C$="   (CONTINUED)":RETURN
  9. 560 GOSUB600:A$=" ":MN=1:RETURN
  10. 600 SV$=A$:IFLC=>FPTHEN615
  11. 610 FORI=1TOFP-LC:A$=" ":GOSUB510:NEXT
  12. 615 IF WT$<>"Y"THEN620
  13. 616 PRINT"...WAITING TO PRINT NEXT PAGE ";:INPUTW1$
  14. 620 PC=PC+1:LC=1
  15. 630 PRINT#4,"       DISK CATALOG MANAGER/REPORTER   DOCUMENTATION     PAGE ";PC
  16. 640 IFLF$="Y"THENPRINT#4,CHR$(10);
  17. 650 A$=" ":GOSUB510
  18. 660 IFSW=0THENSW=1:A$=SV$:RETURN
  19. 670 A$=T$+C$:GOSUB510:IFC$=""THENC$="   (CONTINUED)"
  20. 680 A$=" ":GOSUB510:A$=SV$:RETURN
  21. 900 IFLC=>FPTHENCLOSE4:PRINT"[147]FINISHED":END
  22. 910 FORI=1TOFP-LC:A$=" ":GOSUB510:NEXT
  23. 920 CLOSE4:PRINT"[147]FINISHED":END
  24. 1000 PRINT"[147]     DISK CATALOG MANAGER/REPORTER[146]"
  25. 1010 PRINT"      DOCUMENTATION PRINT PROGRAM"
  26. 1020 PRINT"LINES IN FULL PAGE   66[157][157][157][157]";:INPUTFP
  27. 1030 PRINT"PRINT LINES PER PAGE   58[157][157][157][157]";:INPUTPL
  28. 1040 PRINT"PAUSE AT END OF EACH PAGE (Y/N)   Y[157][157][157]";:INPUTWT$
  29. 1050 PRINT"PRINTER DEVICE ADDRESS   4[157][157][157]";:INPUTDA
  30. 1060 PRINT"PRINTER SECONDARY ADDRESS   0[157][157][157]";:INPUTSA
  31. 1070 PRINT"SEND LINE FEED AFTER EACH PRINT LINE"
  32. 1080 PRINT"   (Y/N)   N[157][157][157]";:INPUTLF$
  33. 1090 PRINT"...PRESS AND HOLD 'Q' TO QUIT PRINTING."
  34. 1100 OPEN4,DA,SA:GOSUB615
  35. 1110 A$="DOCUMENTATION TOPICS ARE AS FOLLOWS:"
  36. 1115 GOSUB500:GOSUB499
  37. 1120 A$="    1)  OVERVIEW"
  38. 1125 GOSUB500:GOSUB499
  39. 1130 A$="    2)  GETTING STARTED"
  40. 1135 GOSUB500:GOSUB499
  41. 1140 A$="    3)  MENU OPTIONS"
  42. 1145 GOSUB500:GOSUB499
  43. 1150 A$="    4)  EDITING NOTES"
  44. 1155 GOSUB500:GOSUB499
  45. 1160 A$="    5)  CONVERSION NOTES"
  46. 1165 GOSUB500:GOSUB499
  47. 1170 T$="...OVERVIEW":C$="":GOSUB550
  48. 1180 A$="THIS IS THE DOCUMENTATION FOR PROGRAM 'DISK CATALOG MANAGER/REPORTER'"
  49. 1185 GOSUB500
  50. 1190 A$="AUTHORED BY RAY MARTIN.  ALTHOUGH THERE IS AN INCLINATION TO THINK"
  51. 1195 GOSUB500
  52. 1200 A$="OF IT AS JUST ANOTHER DISK CATALOGING PROGRAM, LISTED ARE SOME NOTABLE"
  53. 1205 GOSUB500
  54. 1210 A$="FEATURES:"
  55. 1215 GOSUB500:GOSUB499
  56. 1220 A$="1)  A NAME FILE CAPACITY OF 2100 ENTRIES WITH EACH ENTRY COMPOSED"
  57. 1225 GOSUB500
  58. 1230 A$="    OF A 16 POSITION NAME + 4 POSITION ID."
  59. 1235 GOSUB500
  60. 1240 A$="2)  DYNAMIC RECOGNITION OF 2 1541 DISK DRIVES AT PROGRAM STARTUP."
  61. 1245 GOSUB500
  62. 1250 A$="    THE DISK USED TO LOAD THIS PROGRAM WILL BE ESTABLISHED AS THE"
  63. 1255 GOSUB500
  64. 1260 A$="    DEFAULT DEVICE FOR LOAD AND SAVE OF NAME FILES.  IF ANOTHER DISK"
  65. 1265 GOSUB500
  66. 1270 A$="    WITH AN ADDRESS BETWEEN 08 AND 11 IS DETECTED, THEN IT WILL BE"
  67. 1275 GOSUB500
  68. 1280 A$="    ESTABLISHED AS THE DEFAULT DEVICE FOR DOS COMMANDS AND CAPTURING"
  69. 1285 GOSUB500
  70. 1290 A$="    OF DIRECTORY ENTRIES.  THESE STARTUP DEFAULTS MAY BE OVERRIDEN AT"
  71. 1295 GOSUB500
  72. 1300 A$="    ANY TIME."
  73. 1305 GOSUB500
  74. 1310 A$="3)  CAPTURING OF NAMES FROM A DISK DIRECTORY IS UNIQUE IN THAT ALL"
  75. 1315 GOSUB500
  76. 1320 A$="    NAMES ARE READ INTO A TEMPORARY MEMORY AREA WHERE YOU MAY REVIEW,"
  77. 1325 GOSUB500
  78. 1330 A$="    MODIFY, DISCARD, AND REINSTATE NAMES AS MANY TIMES AS NEEDED"
  79. 1335 GOSUB500
  80. 1340 A$="    BEFORE APPENDING TO YOUR NAME FILE IN COMPUTER MEMORY.           "
  81. 1345 GOSUB500
  82. 1350 A$="4)  FULL SCREEN EDITING IS PERHAPS THE MOST NOTABLE FEATURE OF THIS"
  83. 1355 GOSUB500
  84. 1360 A$="    PROGRAM.  18 SCREEN LINES FORM A WINDOW DURING THE EDITING"
  85. 1365 GOSUB500
  86. 1370 A$="    PROCESS COMMON TO BOTH CAPTURE OF NAMES AND REVIEW OF NAME FILE"
  87. 1375 GOSUB500
  88. 1380 A$="    ENTRIES IN COMPUTER MEMORY.  THE CURSOR MAY FREELY BE MOVED"
  89. 1385 GOSUB500
  90. 1390 A$="    WITHIN THE WINDOW AREA ALLOWING YOU TO MODIFY ENTRIES OR SIGNAL"
  91. 1395 GOSUB500
  92. 1400 A$="    THEIR DELETION.  THE CURSOR MAY ALSO BE USED TO SCROLL THE WINDOW"
  93. 1405 GOSUB500
  94. 1410 A$="    AREA UP OR DOWN THROUGH THE NAMES.  FUNCTION KEYS F5 AND F7 ALLOW"
  95. 1415 GOSUB500
  96. 1420 A$="    YOU TO PAGE UP AND DOWN ONE WINDOW AT A TIME.  FOR CONVENIENCE,"
  97. 1425 GOSUB500
  98. 1430 A$="    SCROLLING AND PAGING KEYS AUTO-REPEAT."
  99. 1435 GOSUB500
  100. 1440 A$="5)  NAMES CAN BE ADDED FROM THE KEYBOARD ALTHOUGH CAPTURE OF NAMES"
  101. 1445 GOSUB500
  102. 1450 A$="    FROM DIRECTORIES WILL PROBABLY ACCOUNT FOR MOST ENTRIES IN A NAME"
  103. 1455 GOSUB500
  104. 1460 A$="    FILE."
  105. 1465 GOSUB500
  106. 1470 A$="6)  REVIEW OF NAMES IN THE WINDOW AREA CAN BE RESTRICTED BY LEADING"
  107. 1475 GOSUB500
  108. 1480 A$="    CHARACTERS YOU ENTER FOR EITHER THE NAME OR ID FIELD.  THE ID"
  109. 1485 GOSUB500
  110. 1490 A$="    FIELD IS 4 POSITIONS AND BY KEYING ALL 4 POSITIONS, ONLY NAMES"
  111. 1495 GOSUB500
  112. 1500 A$="    WITH THAT ID WILL BE SHOWN IN THE WINDOW AREA."
  113. 1505 GOSUB500
  114. 1510 A$="7)  A NAME FILE IN COMPUTER MEMORY CAN BE SORTED BY NAME OR ID."
  115. 1515 GOSUB500
  116. 1520 A$="8)  A NAME FILE IN COMPUTER MEMORY CAN BE PRINTED IN 3 COLUMN FORMAT,"
  117. 1525 GOSUB500
  118. 1530 A$="    AND IF YOUR PRINTER SUPPORTS CONDENSED PRINT (136 COLUMNS) YOU"
  119. 1535 GOSUB500
  120. 1540 A$="    CAN PRINT 6 COLUMNS OF NAME + ID ENTRIES PER PAGE."
  121. 1545 GOSUB500
  122. 1550 A$="9)  A DOS MODULE IS PRESENT SO YOU CAN ISSUE DISK AND DIRECTORY"
  123. 1555 GOSUB500
  124. 1560 A$="    COMMANDS IN THE SAME FORMAT USED WITH THE DOS WEDGE."
  125. 1565 MN=2:GOSUB500
  126. 1570 A$="10) EXCEPT FOR THE DOCUMENTATION AND PRINTER SETUP PROGRAMS, CODING"
  127. 1575 MN=2:GOSUB500
  128. 1580 A$="    IS 100% MACHINE LANGUAGE FOR FASTER EXECUTION."
  129. 1585 GOSUB500:GOSUB499
  130. 1590 T$="...GETTING STARTED":C$="":GOSUB550
  131. 1600 A$="THE DISK CATALOG MANAGER/REPORTER PROGRAM IS INITIATED BY:           "
  132. 1605 GOSUB500:GOSUB499
  133. 1610 A$="      LOAD"+CHR$(34)+"DCMR"+CHR$(34)+",8  <RETURN>"
  134. 1615 GOSUB500
  135. 1620 A$="      RUN  <RETURN>"
  136. 1625 GOSUB500:GOSUB499
  137. 1630 A$="WHEN PRESENTED WITH THE INITIAL SCREEN, REPLY 'C' TO CONTINUE LOADING."
  138. 1635 GOSUB500
  139. 1640 A$="IF HOWEVER, PRINTER SETUP HAS NOT PREVIOUSLY BEEN SET FOR YOUR"
  140. 1645 GOSUB500
  141. 1650 A$="PRINTER, REPLY 'P' TO LOAD THE PRINTER SETUP PROGRAM."
  142. 1655 GOSUB500
  143. 1660 A$="BEFORE REPLYING 'P' YOU MIGHT WANT TO REVIEW THIS DISK'S DIRECTORY"
  144. 1665 GOSUB500
  145. 1670 A$="FOR EXISTING PRINTER SETUP CONFIGURATION FILES.  THESE FILES WILL"
  146. 1675 GOSUB500
  147. 1680 A$="BEGIN WITH 'CFG.' WITH ADDITIONAL LETTERS SUGGESTING THE INTENDED"
  148. 1685 GOSUB500
  149. 1690 A$="PRINTER CONFIGURATION.  THE PRINTER SETUP PROGRAM WILL ALLOW YOU TO"
  150. 1695 GOSUB500
  151. 1700 A$="LOAD ONE OF THESE FILES AND DUPLICATE IT AS THE ACTIVE"
  152. 1705 GOSUB500
  153. 1710 A$="'PRINTER.CONFIG' PRINTER CONTROL FILE."
  154. 1715 GOSUB500:GOSUB499
  155. 1720 A$="IF NONE OF THESE FILES ARE SUITABLE FOR YOUR PRINTER CONFIGURATION,"
  156. 1725 GOSUB500
  157. 1730 A$="YOU MAY NEED TO KNOW THE CODES YOUR PRINTER ACCEPTS TO PLACE IT INTO"
  158. 1735 GOSUB500
  159. 1740 A$="AND OUT OF CONDENSED PRINT MODE (136 COLUMNS PER LINE).  CONDENSED"
  160. 1745 GOSUB500
  161. 1750 A$="PRINT FORMAT IS NECESSARY TO PRINT 6 COLUMNS OF NAME + ID ENTRIES PER"
  162. 1755 GOSUB500
  163. 1760 A$="PAGE, BUT IS NOT NEEDED FOR 3 COLUMN PRINTING.                       "
  164. 1765 GOSUB500
  165. 1770 A$="IF YOU CHOOSE TO LOAD A 'CFG.' FILE DURING PRINTER SETUP, YOU WILL"
  166. 1775 GOSUB500
  167. 1780 A$="HAVE THE OPPORTUNITY TO REVISE IT BEFORE SAVING AS THE PRODUCTION"
  168. 1785 GOSUB500
  169. 1790 A$="'PRINTER.CONFG' FILE."
  170. 1795 GOSUB500:GOSUB499
  171. 1800 T$="...MENU OPTIONS":C$="":MN=30:GOSUB550
  172. 1810 A$="LISTED BELOW IS HOW THE MAIN MENU APPEARS ON THE SCREEN."
  173. 1815 GOSUB500:GOSUB499:GOSUB499
  174. 1820 A$="            DISK CATALOG MANAGER/REPORTER"
  175. 1825 GOSUB500:GOSUB499
  176. 1830 A$="        A)  TYPE NEW NAMES FROM KEYBOARD"
  177. 1835 GOSUB500:GOSUB499
  178. 1840 A$="        B)  ADD NEW NAMES FROM DISKETTE"
  179. 1845 GOSUB500:GOSUB499
  180. 1850 A$="        C)  DISPLAY ALL/SELECTIVE  (WITH"
  181. 1855 GOSUB500
  182. 1860 A$="            FULL SCREEN EDITING & DELETING)"
  183. 1865 GOSUB500:GOSUB499
  184. 1870 A$="        D)  SORT BY NAME OR ID"
  185. 1875 GOSUB500:GOSUB499
  186. 1880 A$="        E)  PRINT WITH 3 OR 6 COLUMNS"
  187. 1885 GOSUB500:GOSUB499
  188. 1890 A$="        F)  LOAD A FILE/START A NEW FILE"
  189. 1895 GOSUB500:GOSUB499
  190. 1900 A$="        G)  SAVE A FILE TO DISK"
  191. 1905 GOSUB500:GOSUB499
  192. 1910 A$="        H)  CHANGE AN ID"
  193. 1915 GOSUB500:GOSUB499
  194. 1920 A$="        I)  DISK DIRECTORY & DOS COMMANDS"
  195. 1925 GOSUB500:GOSUB499
  196. 1930 A$="        J)  QUIT"
  197. 1935 GOSUB500:GOSUB499
  198. 1940 A$="       TOTAL ENTRIES 0000 OF POSSIBLE 2100"
  199. 1945 GOSUB500:GOSUB499
  200. 1950 A$="A)  TYPE NEW NAMES FROM KEYBOARD"
  201. 1955 MN=4:GOSUB500:GOSUB499
  202. 1960 A$="THIS OPTION FIRST PROMPTS YOU TO ENTER A 4 POSITION ID.  YOU ARE THEN"
  203. 1965 GOSUB500
  204. 1970 A$="PRESENTED WITH A SCREEN ON WHICH YOU CAN ENTER 16 POSITION NAMES."
  205. 1975 GOSUB500
  206. 1980 A$="THE ID FIELD MAY BE ALTERED IF YOU CHOOSE, BUT IS PRE-FILLED FOR"
  207. 1985 GOSUB500
  208. 1990 A$="YOUR CONVENIENCE."
  209. 1995 GOSUB500:GOSUB499
  210. 2000 A$="B)  ADD NEW NAMES FROM DISKETTE"
  211. 2005 MN=4:GOSUB500:GOSUB499
  212. 2010 A$="THIS OPTION FIRST PROMPTS YOU TO ENTER A 4 POSITION ID.  YOU ARE THEN"
  213. 2015 GOSUB500
  214. 2020 A$="PROMPTED FOR THE DEVICE ADDRESS TO READ THE DIRECTORY FROM.  YOU WILL"
  215. 2025 GOSUB500
  216. 2030 A$="SEE THE DIRECTORY ENTRIES ON THE SCREEN AS THEY ARE CAPTURED AFTER"
  217. 2035 GOSUB500
  218. 2040 A$="WHICH AN 18 ENTRY WINDOW WILL BE SETUP FOR EDITING OF DIRECTORY"
  219. 2045 GOSUB500
  220. 2050 A$="ENTRIES.  NOTHING IS FINAL UNTIL YOU HOLD DOWN THE 'CTRL' KEY AND"
  221. 2055 GOSUB500
  222. 2060 A$="PRESS 'F' AT THE SAME TIME."
  223. 2065 GOSUB500:GOSUB499
  224. 2070 A$="C)  DISPLAY ALL/SELECTIVE   (WITH"
  225. 2075 MN=5:GOSUB499
  226. 2080 A$="    FULL SCREEN EDITING & DELETING)"
  227. 2085 GOSUB500:GOSUB499
  228. 2090 A$="THIS OPTION ALLOWS YOU TO REVIEW NAME ENTRIES IN A VARIETY OF WAYS."
  229. 2095 GOSUB500
  230. 2100 A$="ENTRIES THAT ARE SHOWN MAY BE MODIFIED OR DELETED.  NOTE THAT"
  231. 2105 GOSUB500
  232. 2110 A$="DELETION DOES NOT OCCUR IMMEDIATELY.  A PAGING KEY (F5 OR F7) OR ANY"
  233. 2115 GOSUB500
  234. 2120 A$="KEY THAT CAUSES AN ENTRY TO GO OFF SCREEN WILL CAUSE DELETION OF ANY"
  235. 2125 GOSUB500
  236. 2130 A$="ENTRY SHOWN IN REVERSE VIDEO.  YOU ARE PRESENTED WITH A SUB MENU TO"
  237. 2135 GOSUB500
  238. 2140 A$="COMMUNICATE HOW YOU WISH THE ENTRIES SHOWN."
  239. 2145 GOSUB500:GOSUB499
  240. 2150 A$="     1  SHOW ALL ENTRIES STARTING AT TOP"
  241. 2155 MN=6:GOSUB500
  242. 2160 A$="     2  SHOW ALL ENTRIES STARTING AT BOTTOM"
  243. 2165 GOSUB500
  244. 2170 A$="     3  SHOW ALL ENTRIES STARTING AT NAME"
  245. 2175 GOSUB500
  246. 2180 A$="          YOU ENTER"
  247. 2185 GOSUB500
  248. 2190 A$="     4  RESTRICT SHOW OF ENTRIES BY NAME"
  249. 2195 GOSUB500
  250. 2200 A$="     5  RESTRICT SHOW OF ENTRIES BY ID"
  251. 2205 GOSUB500:GOSUB499
  252. 2210 A$="WHEN SUPPLYING A NAME OR ID YOU MAY KEY ALL CHARACTER POSITIONS OR"
  253. 2215 MN=2:GOSUB500
  254. 2220 A$="LEADING POSITIONS ONLY.  AS MANY POSITIONS AS YOU KEY WILL BE"
  255. 2225 GOSUB500
  256. 2230 A$="COMPARED TO THE SAME CHARACTER POSITIONS OF EACH ENTRY AND MUST MATCH"
  257. 2235 GOSUB500
  258. 2240 A$="BEFORE SELECTION IS SATISFIED AND THE ENTRY SHOWN."
  259. 2245 GOSUB500:GOSUB499
  260. 2250 A$="SUB MENU ITEM 3 PROMPTS FOR A COMPARISON NAME FIELD.  SELECTION"
  261. 2255 MN=2:GOSUB500
  262. 2260 A$="OCCURS ONLY ONCE AND SERVES AS A STARTING POINT."
  263. 2265 GOSUB500
  264. 2270 A$="FOR A LARGE NUMBER OF ENTRIES IT MIGHT BE CONVENIENT TO BEGIN THE"
  265. 2275 GOSUB500
  266. 2280 A$="DISPLAY WITH THE FIRST OCCURRENCE OF A NAME HAVING THE FIRST LETTER"
  267. 2285 GOSUB500
  268. 2290 A$="IN COMMON WITH THE NAME YOU ARE LOOKING FOR.  THIS DOES ASSUME YOUR"
  269. 2295 GOSUB500
  270. 2300 A$="ENTRIES ARE IN NAME SEQUENCE."
  271. 2305 GOSUB500:GOSUB499
  272. 2310 A$="SUB MENU ITEM 5 MAY BE MOST USEFUL TO SEE ONLY THOSE ENTRIES FOR A"
  273. 2315 MN=2:GOSUB500
  274. 2320 A$="PARTICULAR ID.  IF EVER YOU HAVE THE NEED TO DELETE ALL ENTRIES FOR"
  275. 2325 GOSUB500
  276. 2330 A$="AN ID, SELECT THIS OPTION SUPPLYING ALL 4 POSITIONS FOR THE ID AND"
  277. 2335 GOSUB500
  278. 2340 A$="THEN USE 'CTRL-S' FOLLOWED BY 'F7' TO DELETE ALL ENTRIES SHOWN ON THE"
  279. 2345 GOSUB500
  280. 2350 A$="SCREEN AT ONCE.  REPEAT THE PROCESS UNTIL NO MORE ENTRIES APPEAR FOR"
  281. 2355 GOSUB500
  282. 2360 A$="THE SELECTED ID."
  283. 2365 GOSUB500:GOSUB499
  284. 2370 A$="D)  SORT BY NAME OR ID"
  285. 2375 MN=4:GOSUB500:GOSUB499
  286. 2380 A$="THIS OPTION FIRST PROMPTS YOU TO ENTER 'N' OR 'I' TO COMMUNICATE THE"
  287. 2385 GOSUB500
  288. 2390 A$="SORT SEQUENCE."
  289. 2395 GOSUB500:GOSUB499
  290. 2400 A$="ALTHOUGH SORTING IS REASONABLY FAST, IF YOU ARE INCLINED TO SORT BOTH"
  291. 2405 GOSUB500
  292. 2410 A$="IN NAME SEQUENCE AND ID SEQUENCE YOU MAY CHOOSE TO SAVE YOUR NAME"
  293. 2415 GOSUB500
  294. 2420 A$="FILE TO DISK AFTER SORTING IN NAME SEQUENCE.  THIS MAY SAVE YOU A"
  295. 2425 GOSUB500
  296. 2430 A$="THIRD SORT TO PLACE ENTRIES BACK INTO NAME SEQUENCE ASSUMING YOU"
  297. 2435 GOSUB500
  298. 2440 A$="PREFER YOUR FILE SAVED IN NAME SEQUENCE."
  299. 2445 GOSUB500:GOSUB499
  300. 2450 A$="E)  PRINT WITH 3 OR 6 COLUMNS"
  301. 2455 MN=4:GOSUB500:GOSUB499
  302. 2460 A$="THIS OPTION PROMPTS FOR A NUMBER OF THINGS; LINES IN FULL PAGE, PRINT"
  303. 2465 GOSUB500
  304. 2470 A$="LINES PER PAGE, COLUMNS PER PAGE (3/6), PAUSE AT END OF EACH PAGE"
  305. 2475 GOSUB500
  306. 2480 A$="(Y/N), AS OF DATE, AND TITLE."
  307. 2485 GOSUB500
  308. 2490 A$="IF THE 'PRINTER.CONFIG' FILE WAS DEFINED WITH OPTIONAL PRINTER SETUP"
  309. 2495 GOSUB500
  310. 2500 A$="SEQUENCES 1-4, THEN YOU ARE GIVEN THE OPPORTUNITY TO SEND ANY OF"
  311. 2505 GOSUB500
  312. 2510 A$="THESE."
  313. 2515 GOSUB500
  314. 2520 A$="IF YOUR PRINTER NORMALLY SKIPS LINES AT THE END OF EACH PAGE, YOU MAY"
  315. 2525 GOSUB500
  316. 2530 A$="FIND IT CONVENIENT TO SPECIFY A LINES IN FULL PAGE VALUE EQUAL TO THE"
  317. 2535 GOSUB500
  318. 2540 A$="ACTUAL NUMBER OF LINES IN A FULL PAGE MINUS THE NUMBER OF LINES THAT"
  319. 2545 GOSUB500
  320. 2550 A$="ARE AUTOMATICALLY SKIPPED."
  321. 2555 GOSUB500
  322. 2560 A$="FOR INFORMATION ON PRINTER SETUP, REFER TO THE DOCUMENTATION TOPIC"
  323. 2565 GOSUB500
  324. 2570 A$="'GETTING STARTED'."
  325. 2575 GOSUB500:GOSUB499
  326. 2580 A$="F)  LOAD A FILE/START A NEW FILE"
  327. 2585 MN=4:GOSUB500:GOSUB499
  328. 2590 A$="THIS OPTION FIRST PROMPTS FOR AN 'L' OR 'S' TO SIGNAL LOAD OR START"
  329. 2595 GOSUB500
  330. 2600 A$="OF A NAME FILE.  IF LOAD IS YOUR CHOICE, YOU WILL BE PROMPTED FOR THE"
  331. 2605 GOSUB500
  332. 2610 A$="NAME OF THE FILE AND THEN THE DISK DEVICE ADDRESS TO LOAD FROM."
  333. 2615 GOSUB500
  334. 2620 A$="AFTER A SUCCESSFUL LOAD YOU WILL BE SHOWN THE DATE AND TITLE"
  335. 2625 GOSUB500
  336. 2630 A$="PREVIOUSLY ASSOCIATED WITH THE NAME FILE."
  337. 2635 GOSUB500:GOSUB499
  338. 2640 A$="G)  SAVE A FILE TO DISK"
  339. 2645 MN=4:GOSUB500:GOSUB499
  340. 2650 A$="THIS OPTION PROMPTS YOU FOR THE DATE AND TITLE TO ASSOCIATE WITH THE"
  341. 2655 GOSUB500
  342. 2660 A$="NAME FILE TO BE SAVED.  YOU ARE THEN PROMPTED TO ENTER THE NAME TO"
  343. 2665 GOSUB500
  344. 2670 A$="USE IN SAVING YOUR FILE FOLLOWED BY A PROMPT FOR THE TARGET DISK"
  345. 2675 GOSUB500
  346. 2680 A$="DEVICE ADDRESS."
  347. 2685 GOSUB500:GOSUB499
  348. 2690 A$="IF YOU HAVE TROUBLE SAVING YOUR FILE, TRY RESETTING THE DISK DRIVE OR"
  349. 2695 GOSUB500
  350. 2700 A$="TURNING IT OFF AND ON."
  351. 2705 GOSUB500:GOSUB499
  352. 2710 A$="IT MAY BE EASIER TO KEEP TRACK OF THE NAME YOU USE IN SAVING YOUR"
  353. 2715 MN=2:GOSUB500
  354. 2720 A$="FILE IF YOU INCORPORATE A 2 DIGIT SEQUENCE NUMBER AS PART OF THE NAME."
  355. 2725 GOSUB500
  356. 2730 A$="BY INCREMENTING THIS NUMBER WITH EACH CHANGE AND RESAVE OF THE NAME"
  357. 2735 GOSUB500
  358. 2740 A$="FILE, IT WILL BE SIMPLE TO IDENTIFY THE LATEST NAME FILE WHEN"
  359. 2745 GOSUB500
  360. 2750 A$="VIEWING THE DIRECTORY OF THE DISK IT IS STORED ON.  ALSO, IF YOU"
  361. 2755 GOSUB500
  362. 2760 A$="INCORPORATE THE SAVE NAME FILE IN THE TITLE, THEN YOUR PRINTED REPORT"
  363. 2765 GOSUB500
  364. 2770 A$="TITLE WILL REVEAL THE FILE NAME TO LOAD WHEN NEXT YOU GO TO REVISE IT."
  365. 2775 GOSUB500:GOSUB499
  366. 2780 A$="H)  CHANGE AN ID"
  367. 2785 MN=4:GOSUB500:GOSUB499
  368. 2790 A$="THIS OPTION ALLOWS YOU TO CHANGE THE 4 POSITION ID FIELD FROM ONE"
  369. 2795 GOSUB500
  370. 2800 A$="VALUE TO ANOTHER.  YOU ARE FIRST PROMPTED TO ENTER THE OLD ID,"
  371. 2805 GOSUB500
  372. 2810 A$="FOLLOWED BY THE NEW ID.  NO CHECK IS MADE TO INSURE THE UNIQUENESS OF"
  373. 2815 GOSUB500
  374. 2820 A$="THE NEW ID.  UPON COMPLETION, YOU WILL BE SHOWN A SUMMARY COUNT OF"
  375. 2825 GOSUB500
  376. 2830 A$="ENTRIES CHANGED."
  377. 2835 GOSUB500:GOSUB499
  378. 2840 A$="I)  DISK DIRECTORY & DOS COMMANDS"
  379. 2845 MN=4:GOSUB500:GOSUB499
  380. 2850 A$="THIS OPTION NOT ONLY ALLOWS YOU TO OBTAIN DISK DIRECTORIES AND SEND"
  381. 2855 GOSUB500
  382. 2860 A$="DOS COMMANDS, BUT ALSO PERMITS YOU TO CHANGE THE DEVICE ADDRESS A"
  383. 2865 GOSUB500
  384. 2870 A$="DISK UNIT RESPONDS TO AS WELL AS THE DISK DEVICE # THE DIRECTORY AND"
  385. 2875 GOSUB500
  386. 2880 A$="DOS COMMANDS ARE ROUTED TO.  YOU ARE PRESENTED WITH A SUB MENU AS"
  387. 2885 GOSUB500
  388. 2890 A$="FOLLOWS:"
  389. 2895 GOSUB500:GOSUB499
  390. 2900 A$="     1)  ENTER DIRECTORY & DOS COMMANDS"
  391. 2905 MN=5:GOSUB500
  392. 2910 A$="     2)  SET DEVICE # FOR COMMANDS (NOW 08)"
  393. 2915 GOSUB500
  394. 2920 A$="     3)  CHANGE 1541 DISK DRIVE DEVICE #"
  395. 2925 GOSUB500
  396. 2930 A$="     4)  CAPTURE NAMES FROM DISKETTE"
  397. 2935 GOSUB500
  398. 2940 A$="     5)  EXIT"
  399. 2945 GOSUB500:GOSUB499
  400. 2950 A$="SUB MENU ITEM 1 ALLOWS YOU TO TYPE COMMANDS IN THE SAME FORMAT USED"
  401. 2955 MN=2:GOSUB500
  402. 2960 A$="WITH THE DOS WEDGE.  COMMANDS YOU ENTER ARE SENT TO THE DISK WITHOUT"
  403. 2965 GOSUB500
  404. 2970 A$="ALTERATION.  DISK STATUS IS AUTOMATICALLY SUPPLIED AFTER A COMMAND IS"
  405. 2975 GOSUB500
  406. 2980 A$="PROCESSED.  COMMANDS ARE SENT TO THE DISK DEVICE # SHOWN IN SUB MENU"
  407. 2985 GOSUB500
  408. 2990 A$="ITEM 2."
  409. 2995 GOSUB500:GOSUB499
  410. 3000 A$="SUB MENU ITEM 2 ALLOWS THE TARGET DEVICE # FOR DIRECTORY AND DOS"
  411. 3005 MN=2:GOSUB500
  412. 3010 A$="COMMANDS TO BE CHANGED.  THE CURRENT TARGET DEVICE # IS SHOWN INSIDE"
  413. 3015 GOSUB500
  414. 3020 A$="PARENTHESIS."
  415. 3025 GOSUB500:GOSUB499
  416. 3030 A$="SUB MENU ITEM 3 ALLOWS YOU TO CHANGE THE DEVICE # A DISK DRIVE"
  417. 3035 GOSUB500
  418. 3040 A$="RESPONDS TO FROM ITS CURRENT VALUE TO A VALUE BETWEEN 08 AND 11."
  419. 3045 GOSUB500
  420. 3050 A$="THIS CHANGE IS TEMPORARY IN DISK DRIVE MEMORY LOCATIONS $77-78."
  421. 3055 GOSUB500:GOSUB499
  422. 3060 A$="SUB MENU ITEM 4 IS A DUPLICATION OF MAIN MENU ITEM 'B)  ADD NEW NAMES"
  423. 3065 GOSUB500
  424. 3070 A$="FROM DISKETTE'."
  425. 3075 GOSUB500:GOSUB499
  426. 3080 A$="SUB MENU ITEM 5 WILL EXIT TO THE MAIN MENU."
  427. 3085 GOSUB500:GOSUB499
  428. 3090 A$="J)  QUIT"
  429. 3095 MN=4:GOSUB500:GOSUB499
  430. 3100 A$="THIS OPTION WILL EXIT THE DISK CATALOG MANAGER/REPORTER PROGRAM AND"
  431. 3105 GOSUB500
  432. 3110 A$="RESET THE COMPUTER.  IT MAY PROMPT YOU TO BE SURE OF YOUR INTENTIONS"
  433. 3115 GOSUB500
  434. 3120 A$="BEFORE FULFILLING THE QUIT OPERATION."
  435. 3125 GOSUB500:GOSUB499
  436. 3130 T$="...EDITING NOTES":C$="":MN=15:GOSUB550
  437. 3140 A$="FULL SCREEN EDITING IS PERHAPS THE MOST NOTABLE FEATURE OF THIS"
  438. 3145 GOSUB500
  439. 3150 A$="PROGRAM.  18 SCREEN LINES FORM A WINDOW DURING THE EDITING PROCESS"
  440. 3155 GOSUB500
  441. 3160 A$="COMMON TO BOTH CAPTURE OF NAMES AND REVIEW OF A NAME FILE IN COMPUTER"
  442. 3165 GOSUB500
  443. 3170 A$="MEMORY.  THE CURSOR MAY FREELY BE MOVED WITHIN THE WINDOW AREA"
  444. 3175 GOSUB500
  445. 3180 A$="ALLOWING YOU TO MODIFY ENTRIES OR SIGNAL THEIR DELETION.  THE CURSOR"
  446. 3185 GOSUB500
  447. 3190 A$="MAY ALSO BE USED TO SCROLL THE WINDOW AREA UP OR DOWN THROUGH THE"
  448. 3195 GOSUB500
  449. 3200 A$="NAMES."
  450. 3205 GOSUB500
  451. 3210 A$="FUNCTION KEYS F5 AND F7 ALLOW YOU TO PAGE UPWARD AND DOWNWARN ONE"
  452. 3215 GOSUB500
  453. 3220 A$="WINDOW AT A TIME.  FOR CONVENIENCE, SCROLLING AND PAGING KEYS"
  454. 3225 GOSUB500
  455. 3230 A$="AUTO-REPEAT.  ACTUALLY, MOST KEYS WHEN HELD DOWN WILL AUTO-REPEAT"
  456. 3235 GOSUB500
  457. 3240 A$="AFTER A BRIEF DELAY."
  458. 3245 GOSUB500:GOSUB499
  459. 3250 A$="WHEN EDITING, THE TOP OF THE SCREEN WILL SHOW THE FOLLOWING:"
  460. 3255 MN=6:GOSUB500:GOSUB499
  461. 3260 A$="     REVERSE NAMES ARE DISCARDED...TOGGLE"
  462. 3265 GOSUB500
  463. 3270 A$="     USING CTRL-D (1 NAME), CTRL-S (SCREEN)."
  464. 3275 GOSUB500
  465. 3280 A$="     CTRL-F WHEN FINISHED; CTRL-A TO ABORT;"
  466. 3285 GOSUB500
  467. 3290 A$="     CTRL-H FOR HELP; 0000 ENTRIES (2100 MAX)"
  468. 3295 GOSUB500:GOSUB499
  469. 3300 A$="REVERSE VIDEO NAMES ARE DELETED.  NOTE THAT DELETION DOES NOT OCCUR"
  470. 3305 MN=2:GOSUB500
  471. 3310 A$="IMMEDIATELY.  A PAGING KEY (F5 OR F7) OR ANY KEY THAT CAUSES AN ENTRY"
  472. 3315 GOSUB500
  473. 3320 A$="TO GO OFF SCREEN WILL CAUSE DELETION OF ANY ENTRY SHOWN IN REVERSE"
  474. 3325 GOSUB500
  475. 3330 A$="VIDEO.  YOU MAY TOGGLE A SINGLE ENTRY INTO AND OUT OF REVERSE VIDEO"
  476. 3335 GOSUB500
  477. 3340 A$="BY HOLDING DOWN THE 'CTRL' KEY AND PRESSING 'D'.  BY HOLDING DOWN"
  478. 3345 GOSUB500
  479. 3350 A$="THE 'CTRL' KEY AND PRESSING 'S' YOU CAN TOGGLE ALL 18 ENTRIES IN THE"
  480. 3355 GOSUB500
  481. 3360 A$="SCREEN WINDOW TO THEIR OPPOSITE VIDEO IMAGE."
  482. 3365 GOSUB500
  483. 3370 A$="IF YOU NEED TO DISCARD THE MAJORITY OF THE 18 ENTRIES SHOWN IN THE"
  484. 3375 GOSUB500
  485. 3380 A$="SCREEN WINDOW, IT MAY BE EASIER TO FIRST TOGGLE ALL 18 ENTRIES TO"
  486. 3385 GOSUB500
  487. 3390 A$="REVERSE VIDEO USING 'CTRL-S' AND THEN TOGGLE BACK INDIVIDUAL ENTRIES"
  488. 3395 GOSUB500
  489. 3400 A$="USING 'CTRL-D'."
  490. 3405 GOSUB500
  491. 3410 A$="BY COINCIDENCE THE 'HOME' KEY SENDS THE SAME ASCII CODE AS 'CTRL-S'."
  492. 3415 GOSUB500
  493. 3420 A$="IF YOU PREFER, ANYTIME YOU WOULD USE 'CTRL-S' YOU MAY SUBSTITUTE THE"
  494. 3425 GOSUB500
  495. 3430 A$="SINGLE KEY DEPRESSION OF 'HOME'."
  496. 3435 GOSUB500:GOSUB499
  497. 3440 A$="THE SCREEN MEMORY AREA SERVES AS A TEMPORARY BUFFER AND EVEN THOUGH"
  498. 3445 MN=2:GOSUB500
  499. 3450 A$="INDIVIDUAL ENTRIES MAY BE SCROLLED UP OR DOWN IN THE WINDOW AREA,"
  500. 3455 GOSUB500
  501. 3460 A$="ANY CHANGES ARE DEFERRED UNTIL THE ENTRY IS REMOVED FROM THE SCREEN"
  502. 3465 GOSUB500
  503. 3470 A$="OR A PAGING KEY (F5 OR F7) IS PRESSED.  DUE TO THIS BUFFERING, IF YOU"
  504. 3475 GOSUB500
  505. 3480 A$="HOLD DOWN THE 'CTRL' KEY AND PRESS 'A' (ABORT AND RETURN TO MENU) ANY"
  506. 3485 GOSUB500
  507. 3490 A$="TEMPORARY CHANGES OR DELETIONS WILL NOT BE COMPLETED."
  508. 3495 GOSUB500
  509. 3500 A$="ON THE OTHER HAND, IF YOU HOLD DOWN THE 'CTRL' KEY AND PRESS 'F'"
  510. 3505 GOSUB500
  511. 3510 A$="(FINISH UP AND RETURN TO MAIN MENU), ANY PENDING CHANGES OR DELETIONS"
  512. 3515 GOSUB500
  513. 3520 A$="WILL BE COMPLETED BEFORE RETURNING TO THE MAIN MENU."
  514. 3525 GOSUB500
  515. 3530 A$="EDITING OF DIRECTORY ENTRIES DIFFERS IN RESPECT THAT ALL DIRECTORY"
  516. 3535 GOSUB500
  517. 3540 A$="ENTRIES ARE HELD IN A TEMPORARY MEMORY AREA, NOT JUST THE ONES"
  518. 3545 GOSUB500
  519. 3550 A$="CURRENTLY ON SCREEN.  THEREFORE, EVEN ENTRIES THAT ARE MARKED FOR"
  520. 3555 GOSUB500
  521. 3560 A$="DELETION (REVERSE VIDEO) MAY BE RE-DISPLAYED ON THE SCREEN AND"
  522. 3565 GOSUB500
  523. 3570 A$="TOGGLED BACK OUT OF REVERSE VIDEO IMAGE."
  524. 3575 GOSUB500:GOSUB499
  525. 3580 A$="BY HOLDING DOWN THE 'CTRL' KEY AND PRESSING 'H' YOU ARE PRESENTED"
  526. 3585 MN=2:GOSUB500
  527. 3590 A$="WITH A BRIEF HELP SCREEN NOTING SPECIAL EDITING KEYS.  TWO KEYS NOT"
  528. 3595 GOSUB500
  529. 3600 A$="NOTED INCLUDE THE INSERT 'INST' AND DELETE 'DEL' KEYS WHICH PERFORM"
  530. 3605 GOSUB500
  531. 3610 A$="IN THEIR USUAL WAY."
  532. 3615 GOSUB500:GOSUB499
  533. 3620 A$="ALSO NOT NOTED ARE THE 'RETURN' AND LEFT ARROW (ABOVE 'CTRL') KEYS."
  534. 3625 MN=2:GOSUB500
  535. 3630 A$="THE LEFT ARROW KEY, IF WITHIN A FIELD WILL MOVE THE CURSOR TO"
  536. 3635 GOSUB500
  537. 3640 A$="POSITION 1 OF THAT FIELD, OTHERWISE IT WILL MOVE THE CURSOR TO"
  538. 3645 GOSUB500
  539. 3650 A$="POSITION 1 OF THE PRECEEDING FIELD."
  540. 3655 GOSUB500
  541. 3660 A$="THE RETURN KEY, ON THE OTHER HAND WILL ALWAYS PLACE THE CURSOR IN"
  542. 3665 GOSUB500
  543. 3670 A$="POSITION 1 OF THE FOLLOWING FIELD."
  544. 3675 GOSUB500:GOSUB499
  545. 3680 A$="OTHER EDITING CONTROL KEYS ARE:"
  546. 3685 MN=10:GOSUB500:GOSUB499
  547. 3690 A$="     CRSR UP   - SCROLL UPWARD"
  548. 3695 GOSUB500
  549. 3700 A$="     CRSR DOWN - SCROLL DOWNWARD"
  550. 3705 GOSUB500
  551. 3710 A$="     F1        - MOVE CURSOR TO 1ST NAME"
  552. 3715 GOSUB500
  553. 3720 A$="     F3        - MOVE CURSOR TO LAST NAME"
  554. 3725 GOSUB500
  555. 3730 A$="     F5        - PAGE UPWARD"
  556. 3735 GOSUB500
  557. 3740 A$="     F7        - PAGE DOWNWARD"
  558. 3745 GOSUB500
  559. 3750 A$="     CTRL-A    - ABORT AND RETURN TO MENU"
  560. 3755 GOSUB500
  561. 3760 A$="     CTRL-F    - FINISH UP, RETURN TO MENU"
  562. 3765 GOSUB500:GOSUB499
  563. 3770 A$="THE DEGREE OF INFLUENCE 'CTRL-A' HAS DEPENDS ON WHETHER YOU ARE"
  564. 3775 MN=2:GOSUB500
  565. 3780 A$="EDITING ESTABLISHED NAME ENTRIES, OR DIRECTORIES.  WHEN EDITING"
  566. 3785 GOSUB500
  567. 3790 A$="ESTABLISHED ENTRIES, 'CTRL-A' WILL IGNORE ANY PENDING CHANGES ACTIVE"
  568. 3795 GOSUB500
  569. 3800 A$="ON THE CURRENT SCREEN.  WHEN EDITING DIRECTORIES, 'CTRL-A' WILL"
  570. 3805 GOSUB500
  571. 3810 A$="IGNORE ALL DIRECTORY ENTRIES AND THE ESTABLISHED ENTRY COUNT WILL"
  572. 3815 GOSUB500
  573. 3820 A$="REMAIN UNCHANGED."
  574. 3825 GOSUB500:GOSUB499
  575. 3830 A$="'CTRL-F' DIFFERS FROM 'CTRL-A' IN THAT ANY PENDING CHANGES ARE"
  576. 3835 MN=2:GOSUB500
  577. 3840 A$="COMPLETED AND IF EDITING DIRECTORY ENTRIES, ALL NOT MARKED IN REVERSE"
  578. 3845 GOSUB500
  579. 3850 A$="VIDEO WILL BE APPENDED TO THE BOTTOM OF THE ESTABLISHED NAME ENTRIES."
  580. 3855 GOSUB500
  581. 3860 A$="UPON COMPLETION, 'CTRL-A' AND 'CTRL-F' BOTH RETURN CONTROL TO THE"
  582. 3865 GOSUB500
  583. 3870 A$="MAIN MENU."
  584. 3875 GOSUB500:GOSUB499
  585. 3880 T$="...CONVERSION NOTES":C$="":MN=15:GOSUB550
  586. 3890 A$="AT THIS TIME IN WRITING, TWO CONVERSION PROGRAMS ARE PLANNED."
  587. 3895 GOSUB500:GOSUB499
  588. 3900 A$="'CNV.PROGRAM LIST' IS TO CONVERT FILES MAINTAINED USING THE"
  589. 3905 GOSUB500
  590. 3910 A$="     CATALOGING PROGRAM 'PROGRAM LIST'.
  591. 3915 [141]500:[141]499
  592. 3920 A$[178]"'CNV.DISK FILE4.7' IS TO CONVERT FILES MAINTAINED USING THE"
  593. 3925 [141]500
  594. 3930 A$[178]"     CATALOGING PROGRAM 'DISK FILE 4.7.C'.
  595. 3935 GOSUB500:GOSUB499
  596. 3940 A$="LOAD AND RUN THE RESPECTIVE CONVERSION (CNV.) PROGRAM AND FOLLOW THE"
  597. 3945 GOSUB500
  598. 3950 A$="PROMPTS."
  599. 3955 GOSUB500
  600. 3960 GOTO 900
  601.